Overloads Public Sub Save( _
   ByVal stream As Stream, _
   ByVal containers() As AnnContainer, _
   ByVal format As AnnCodecsFormat _
) 

Dim instance As AnnCodecs
Dim stream As Stream
Dim containers() As AnnContainer
Dim format As AnnCodecsFormat
 
instance.Save(stream, containers, format)

public void Save( 
   Stream stream,
   AnnContainer[] containers,
   AnnCodecsFormat format
)

public:
void Save( 
   Stream^ stream,
   array<AnnContainer^>^ containers,
   AnnCodecsFormat format
) 

Public Sub AnnCodecs_SaveStream2()
    ' create three  annotation containers
    ' The first container contains a rectangle object
    Dim container0 As New AnnContainer()
    Dim rectObj As New AnnRectangleObject()
    rectObj.Bounds = New AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel)
    rectObj.Pen = New AnnPen(Color.Blue, New AnnLength(1, AnnUnit.Pixel))
    rectObj.Brush = Nothing
    container0.Objects.Add(rectObj)

    ' The second container contains a line object
    Dim container1 As New AnnContainer()
    Dim lineObj As New AnnLineObject()
    lineObj.StartPoint = New AnnPoint(100, 100, AnnUnit.Pixel)
    lineObj.EndPoint = New AnnPoint(200, 200, AnnUnit.Pixel)
    lineObj.Pen = New AnnPen(Color.Red, New AnnLength(1, AnnUnit.Pixel))
    container1.Objects.Add(lineObj)

    ' The third container contains a ellipse object
    Dim container2 As New AnnContainer()
    Dim ellipseObj As New AnnEllipseObject()
    ellipseObj.Bounds = New AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel)
    ellipseObj.Pen = New AnnPen(Color.Blue, New AnnLength(1, AnnUnit.Pixel))
    ellipseObj.Brush = Nothing
    container2.Objects.Add(ellipseObj)

    ' create a memory stream to save both annotation containers
    Using ms As New MemoryStream()
        ' create a new AnnCodecs class
        Dim codecs As New AnnCodecs()

        ' save both AnnContainers into the stream
        codecs.Save(ms, container0, AnnCodecsFormat.Xml, 1, AnnCodecsSavePageMode.Overwrite)
        ms.Seek(0, SeekOrigin.Begin)

        codecs.Save(ms, container1, AnnCodecsFormat.Xml, 2, AnnCodecsSavePageMode.Insert)
        ms.Seek(0, SeekOrigin.Begin)

        ' Now load both containers from the stream, and verify that there are two containers
        Dim containersTwo() As AnnContainer = codecs.Load(ms)
        MessageBox.Show(String.Format("After Load: there should be 2 containers.  Total number of containers: {0}", containersTwo.Length))

        ' Add another container, and save to the stream
        Dim containersNew(containersTwo.Length) As AnnContainer
        Array.Copy(containersTwo, containersNew, containersTwo.Length)
        containersNew(2) = container2
        ms.Seek(0, SeekOrigin.Begin)

        codecs.Save(ms, containersNew, AnnCodecsFormat.Xml)
        ms.Seek(0, SeekOrigin.Begin)

        ' Load and verify that there are three containers
        Dim containersThree() As AnnContainer = codecs.Load(ms)
        MessageBox.Show(String.Format("After Load: there should be 3 containers.  Total number of containers: {0}", containersThree.Length))
    End Using
End Sub

public void AnnCodecs_SaveStream2()
{
   // create three  annotation containers
   // The first container contains a rectangle object
   AnnContainer container0 = new AnnContainer();
   AnnRectangleObject rectObj = new AnnRectangleObject();
   rectObj.Bounds = new AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel);
   rectObj.Pen = new AnnPen(Color.Blue, new AnnLength(1, AnnUnit.Pixel));
   rectObj.Brush = null;
   container0.Objects.Add(rectObj);

   // The second container contains a line object
   AnnContainer container1 = new AnnContainer();
   AnnLineObject lineObj = new AnnLineObject();
   lineObj.StartPoint = new AnnPoint(100, 100, AnnUnit.Pixel);
   lineObj.EndPoint = new AnnPoint(200, 200, AnnUnit.Pixel);
   lineObj.Pen = new AnnPen(Color.Red, new AnnLength(1, AnnUnit.Pixel));
   container1.Objects.Add(lineObj);

   // The third container contains a ellipse object
   AnnContainer container2 = new AnnContainer();
   AnnEllipseObject ellipseObj = new AnnEllipseObject();
   ellipseObj.Bounds = new AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel);
   ellipseObj.Pen = new AnnPen(Color.Blue, new AnnLength(1, AnnUnit.Pixel));
   ellipseObj.Brush = null;
   container2.Objects.Add(ellipseObj);

   // create a memory stream to save both annotation containers
   using (MemoryStream ms = new MemoryStream())
   {
      // create a new AnnCodecs class
      AnnCodecs codecs = new AnnCodecs();

      // save both AnnContainers into the stream
      codecs.Save(ms, container0, AnnCodecsFormat.Xml, 1, AnnCodecsSavePageMode.Overwrite);
      ms.Seek(0, SeekOrigin.Begin);

      codecs.Save(ms, container1, AnnCodecsFormat.Xml, 2, AnnCodecsSavePageMode.Insert);
      ms.Seek(0, SeekOrigin.Begin);

      // Now load both containers from the stream, and verify that there are two containers
      AnnContainer[] containersTwo = codecs.Load(ms);
      MessageBox.Show(String.Format("After Load: there should be 2 containers.  Total number of containers: {0}", containersTwo.Length));

      // Add another container, and save to the stream
      AnnContainer[] containersNew = new AnnContainer[containersTwo.Length + 1];
      Array.Copy(containersTwo, containersNew, containersTwo.Length);
      containersNew[2] = container2;
      ms.Seek(0, SeekOrigin.Begin);

      codecs.Save(ms, containersNew, AnnCodecsFormat.Xml);
      ms.Seek(0, SeekOrigin.Begin);

      // Load and verify that there are three containers
      AnnContainer[] containersThree = codecs.Load(ms);
      MessageBox.Show(String.Format("After Load: there should be 3 containers.  Total number of containers: {0}", containersThree.Length));
   }
}